home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Pascal Super Library
/
Pascal Super Library (CW International)(1997).bin
/
SHELLS
/
SZ2
/
GDESKTOP.INT
< prev
next >
Wrap
Text File
|
1992-08-31
|
2KB
|
41 lines
{*******************************************************************
GDESKTOP.INT
*******************************************************************}
CONST
DesktopName : PathStr = 'DESKTOP.DSK' ;
{|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
LOAD/STORE
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||}
procedure SaveHistory ( VAR S : TStream ) ;
procedure LoadHistory ( VAR S : TStream ) ;
procedure SavePalette ( VAR S : TStream ) ;
procedure LoadPalette ( VAR S : TStream ) ;
procedure DesktopWriteViews ( VAR S : TStream ) ;
procedure DesktopReadViews ( VAR S : TStream ) ;
procedure SaveDesktopTo ( FileName : PathStr ; Description : string ) ;
procedure LoadDesktopFrom ( FileName : PathStr ) ;
{|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
EVENT
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||}
procedure CommandAll ( Command : word ) ;
procedure CloseAll ;
procedure ShowAll ;
procedure HideAll ;
procedure ForceEvent ( What , Command : word ) ;
function IsZoomed ( P : PView ) : boolean ;
{|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
UTILITY
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||}
function Tileable ( P : PView ) : boolean ;
function Visible ( P : PView ) : boolean ;
function Selectable ( P : PView ) : boolean ;
function Active ( P : PView ) : boolean ;
function Zoomable ( P : PView ) : boolean ;
function ExistActive : boolean ;
function CountSelectable : byte ;
function CountTileable : byte ;
procedure GetTitleList ( AList : PCollection ) ;
procedure SelectNum ( AFocus : integer ) ;